B u t t o n   3   T e x t   " B u t t o n 3 " 
 
 ' W a i t   S l o t ( 1 )   >   5 0 0 
 
 ' W a i t   B u t t o n   B u t t o n 3 
 
 
 
 V a r i a b l e   S t r i n g   L o g F i l e N a m e 
 
 L o g F i l e N a m e   =   " T e s t L o g D o o r L o c k B T . t x t " 
 
 
 
 V a r i a b l e   N u m e r i c   S t a r t T i m e 
 
 C o n t r o l s   O p e n T e x t B o x 
 
 
 
 F o r   v 1   =   0   T o   1 e 9 9 
 
 	 v 2   =   v 2   +   2 9 
 
 	 P r i n t   " C h a r s :   "   +   v 2   +   "     " 
 
 	 P r i n t   " S e c o n d s :   "   +   F o r m a t ( E l a p s e d T i m e   -   S t a r t T i m e ,   " 0 . 0 0 0 " )   +   C R L F 
 
 	 S t a r t T i m e   =   E l a p s e d T i m e 
 
 N e x t 
 
 
 
 S t o p 
 
 
 
 L a b e l   B u t t o n 3 
 
 	 ' L o a d   " . . \ F i l e s \ "   +   L o g F i l e N a m e 
 
 	 L o a d   " f i l e s \ T e s t L o g D o o r L o c k B T . t x t " 
 
 	 ' L o a d   " . . \ d o c s \ T h e r e m i n o _ A u t o m a t i o n _ H e l p _ I T A . p d f " 
 
 	 
 
 	 ' L o a d   C l o s e A p p s 
 
 R e t u r n 
 
 
 
 L a b e l   E v e n t S t o p 
 
 	 ' W a i t   S e c o n d s   0 . 5 
 
 	 B e e p 
 
 	 ' C o n t r o l s   C l o s e T e x t B o x 
 
 	 ' L o a d   C l o s e A p p s 
 
 E n d 
 
 
 
 
 
 ' W A T C H   S e q u e n c e C m d 
 
 ' W A T C H   s 1 
 
 ' W A T C H   U C a s e ( S e q u e n c e C m d ) 
 
 